program testIfThenElse;

class testIfThenElse

BEGIN
   VAR aa, bb: integer;

FUNCTION testIfThenElse;
BEGIN   
   aa := 3;
   bb := 2;
   aa := aa + bb;
   bb := 0;
   print bb
END
   
END   
.

